home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 6 / FM Towns Free Software Collection 6.iso / t_os / vdtwn / tvf / asmhd6 / comdhd6 / j_xor2.hd6 < prev    next >
Text File  |  1993-07-08  |  1KB  |  103 lines
  1. ds_name        db    '\KOMEI\実物\TVF_PRG\J_XOR2',0
  2.  
  3. paint_wd:
  4.      SET_P dt1
  5.      SET_P dt2
  6.      SET_P dt3
  7.      SET_P dt4
  8. re_paint:
  9.      WD_CLS 0
  10.      BOX boxdt,1
  11.      MOZI mozidt
  12. be_called:
  13.      ret
  14.  
  15. mouse_in:
  16.       cmp ch,1
  17.      je mouseck
  18.       ret
  19.  
  20. mouseck:
  21.      MOU boxdt,1
  22.  
  23.      cmp bx,1                  ;bx=1 find
  24.      je short mck1             ;ax = no
  25.      ret
  26. mck1:
  27.      cmp ax,1
  28.      je find1    
  29.      ret
  30. find1:
  31.      mov ax,1
  32.      KAKU 306,ax
  33.      CALL_P dt1
  34.      CALL_P dt4
  35.      CALL_P dt2
  36.      CALL_P dt3
  37.  
  38.      GAMEN 1632
  39.      
  40.      mov ah,25
  41.      mov al,2
  42.      mov bx,0
  43.      call komei
  44.  
  45.      mov ah,27
  46.      call komei
  47.  
  48.  
  49.      ret
  50. look_me:
  51.      call sub_esi
  52.      dd 0,0
  53.      dw     1,0,17*8,26,382,90+30*7,15,5,0,0
  54.  
  55.  
  56.  
  57. boxdt:
  58.     call sub_edi
  59.         dw    1,17*8-4,24,2,2,0,20,12,7,0
  60.  
  61.  
  62. ; [count][sz_x][sz_y][off_x][off_y][+x][+y][f_col][b_col][s_no]
  63.  
  64. mozidt:
  65.     call sub_edi
  66.            dw    0        ;screen_no
  67.            dw    1      ; mozi_color
  68.            dw    2      ; 書き出し位置  x
  69.            dw    2      ;          y
  70.            dw    10      ; next offset x
  71.            dw    0      ; next offset y
  72.     
  73.                dw   1      ; gyo suu
  74.                    db    'ＸＯＲ＋ウエイト',0
  75.                 dw 0,0
  76.  
  77.  
  78. dt1:
  79.      call sub_edi
  80.      dw     ?
  81.      db 'F_COL',0
  82. dt3:
  83.      call sub_edi
  84.      dw     ?
  85.      db 'P_XOR2',0
  86. dt2:
  87.      call sub_edi
  88.      dw     ?
  89.      db 'H_DG',0
  90. dt4:
  91.      call sub_edi
  92.      dw     ?
  93.      db 'J_SLOW',0
  94.  
  95. p_set:
  96.      M_P_SET
  97. p_call:
  98.  
  99.          M_P_CALL
  100.  
  101.  
  102.  
  103.